<?php

namespace app\admin\controller\rexam;

use app\common\controller\Backend;
use PhpOffice\PhpSpreadsheet\Cell\Coordinate;
use Exception;
use PhpOffice\PhpSpreadsheet\Reader\Xlsx;
use PhpOffice\PhpSpreadsheet\Reader\Xls;
use PhpOffice\PhpSpreadsheet\Reader\Csv;
use think\Db;
use think\exception\PDOException;
use think\exception\ValidateException;

/**
 * 题库管理
 *
 * @icon fa fa-circle-o
 */
class Question extends Backend
{
    protected $importHeadType = 'name';

    /**
     * Question模型对象
     * @var \app\admin\model\rexam\Question
     */
    protected $model = null;

    public function _initialize()
    {
        parent::_initialize();
        $this->model = new \app\admin\model\rexam\Question;
        $this->view->assign("typedataList", $this->model->getTypedataList());
        $this->view->assign("judgedataList", $this->model->getJudgedataList());
    }

    public function import()
    {
        $file = $this->request->request('file');
        if (!$file) {
            $this->error(__('Parameter %s can not be empty', 'file'));
        }
        $filePath = ROOT_PATH . DS . 'public' . DS . $file;
        if (!is_file($filePath)) {
            $this->error(__('No results were found'));
        }
        //实例化reader
        $ext = pathinfo($filePath, PATHINFO_EXTENSION);
        if (!in_array($ext, ['csv', 'xls', 'xlsx'])) {
            $this->error(__('Unknown data format'));
        }

        if ($ext === 'csv') {
            $file = fopen($filePath, 'r');
            $filePath = tempnam(sys_get_temp_dir(), 'import_csv');
            $fp = fopen($filePath, "w");
            $n = 0;
            while ($line = fgets($file)) {
                $line = rtrim($line, "\n\r\0");
                $encoding = mb_detect_encoding($line, ['utf-8', 'gbk', 'latin1', 'big5']);
                if ($encoding != 'utf-8') {
                    $line = mb_convert_encoding($line, 'utf-8', $encoding);
                }
                if ($n == 0 || preg_match('/^".*"$/', $line)) {
                    fwrite($fp, $line . "\n");
                } else {
                    fwrite($fp, '"' . str_replace(['"', ','], ['""', '","'], $line) . "\"\n");
                }
                $n++;
            }
            fclose($file) || fclose($fp);

            $reader = new Csv();
        } elseif ($ext === 'xls') {
            $reader = new Xls();
        } else {
            $reader = new Xlsx();
        }

        $subject_model = new \app\admin\model\rexam\Subject;

        //加载文件
        $insert = [];
        Db::startTrans();
        try {
            if (!$PHPExcel = $reader->load($filePath)) {
                $this->error(__('Unknown data format'));
            }
            $currentSheet = $PHPExcel->getSheet(0);  //读取文件中的第一个工作表
            $allColumn = $currentSheet->getHighestDataColumn(); //取得最大的列号
            $allRow = $currentSheet->getHighestRow(); //取得一共有多少行
            $maxColumnNumber = Coordinate::columnIndexFromString($allColumn);

            $currentColumn = 1;
            $currentRow = 1;
            $val = $currentSheet->getCellByColumnAndRow($currentColumn, $currentRow)->getValue();
            if($val!=='题号'){
                $this->error('模板有误，请使用云答题后台下载的试题模板');
            }

            for ($currentRow = 3; $currentRow <= $allRow; $currentRow++) {//从第3行开始，前面2行是标题
                $question_one = [];
                $answer = [];
                $question_import = [];
                $options_value = [];
                for ($currentColumn = 1; $currentColumn <= $maxColumnNumber; $currentColumn++) {
                    $val = $currentSheet->getCellByColumnAndRow($currentColumn, $currentRow)->getValue();
                    switch($currentColumn) {
                        case 1://第一列检验是否已导入过的题目，如已导入则更新
                            if ($val) {
                                $question_one = $this->model->where(['sn' => $val])->find();
                                $question_import['sn'] = $val;
                            }
                            break;
                        case 2:
                            $question_import['rexam_subject_id'] = $subject_model->where(['name' => $val])->value('id');
                            break;
                        case 3:
                            if ($val == '单选') {
                                $question_import['typedata'] = 1;
                            } elseif ($val == '多选') {
                                $question_import['typedata'] = 2;
                            } elseif ($val == '判断') {
                                $question_import['typedata'] = 3;
                            } elseif ($val == '填空') {
                                $question_import['typedata'] = 4;
                            }else {
                                $this->error('第' . $currentRow . '行试题的题型错误，目前仅支持单选、多选、判断3种题型');
                            }
                            break;
                        case 4:
                            $question_import['title'] = $val;
                            break;
                        case 5:
                        case 6:
                        case 7:
                        case 8:
                        case 9:
                        case 10:
                            $options_value[] = $val;
                            break;
                        case 11:
                            $answer = $val;

                            $question_import['tk_answer'] = $val;
                            break;
                        case 12:
                            $question_import['content'] = $val;
                            break;
                        case 13:
                            $question_import['answercontent'] = $val;
                            break;
                        default:
                            break;
                    }
                }
                $key_str = ['A','B','C','D','E','F'];
                switch($question_import['typedata']){
                    case 1://单选
                        $options = [];
                        foreach($options_value as $k => $v){
                            if(empty($v)){
                                continue;
                            }
                            if($key_str[$k] == $answer){
                                $options[] = [
                                    'key'=>$key_str[$k],
                                    'value'=>$v,
                                    'answer'=>'1'
                                ];
                            }else{
                                $options[] = [
                                    'key'=>$key_str[$k],
                                    'value'=>$v
                                ];
                            }
                        }
                        $question_import['options']=json_encode($options);
                        break;
                    case 2://多选
                        $options = [];
                        foreach($options_value as $k => $v){
                            if(empty($v)){
                                continue;
                            }
                            if(strpos($answer, $key_str[$k]) !== false){
                                $options[] = [
                                    'key'=>$key_str[$k],
                                    'value'=>$v,
                                    'answer'=>'1'
                                ];
                            }else{
                                $options[] = [
                                    'key'=>$key_str[$k],
                                    'value'=>$v
                                ];
                            }
                        }
                        $question_import['options']=json_encode($options);
                        break;
                    case 3://判断
                        if($answer == 'Y' || $answer == 'y'){
                            $question_import['judgedata']=1;
                        }else{
                            $question_import['judgedata']=0;
                        }
                        break;
                }
                if($question_one){
//                    $this->model->isUpdate(true)->save($question_import, ['id'=>$question_one['id']]);
                    $insert[] = array_merge($question_import, ['id'=>$question_one['id']]);
                }else{
//                    $this->model->isUpdate(false)->save($question_import);
                    $insert[] = $question_import;
                }
            }

            $this->model->saveAll($insert);
            Db::commit();
        } catch (Exception $exception) {
            Db::rollback();
            $this->error("导入失败:".$exception->getMessage());
        }

        $this->success();
    }

    /**
     * 默认生成的控制器所继承的父类中有index/add/edit/del/multi五个基础方法、destroy/restore/recyclebin三个回收站方法
     * 因此在当前控制器中可不用编写增删改查的代码,除非需要自己控制这部分逻辑
     * 需要将application/admin/library/traits/Backend.php中对应的方法复制到当前控制器,然后进行修改
     */
    public function index()
    {
        //当前是否为关联查询
        $this->relationSearch = true;

        //设置过滤方法
        $this->request->filter(['strip_tags', 'trim']);
        if ($this->request->isAjax()) {
            //如果发送的来源是Selectpage，则转发到Selectpage
            if ($this->request->request('keyField')) {
                return $this->selectpage();
            }
            list($where, $sort, $order, $offset, $limit) = $this->buildparams();

            $list = $this->model
                ->with(['subject'])
                ->where($where)
                ->order($sort, $order)
                ->paginate($limit);

            $result = array("total" => $list->total(), "rows" => $list->items());

            return json($result);
        }
        return $this->view->fetch();
    }



}
